Appendix A 



END: TCBWR index 

IDLE: JMP IDLE 

LBLLISTEN: SUB rcvflen], HEADERLEN -> seglen 

AND rcv[code], RST -> cond 

BRNEQZ IDLE 

AND rcv[code], ACK --> cond 

BRNEQZ TCPRST 

AND rcv[code], SYN --> cond 

BRNEQZ TCPINITWIN 

JMP TCPRST 
LBLLISTEN 1 : LOAD wkregfstate] <- SYNRCVD 

JMP END 
LBLSYNRCVD: JMP TCPSEQOK 
LBLSYNRCVD1 : AND rcv[code], ACK --> cond 

BREQZ IDLE 

CMP wkregfsuna], rcvfack] -> cond 
BRNEQZ TCPRST 
CMP rcv[ack], wkregfsnext] ~> cond 
BRNEQZ TCPRST 
ADD wkreg[suna], 1 -> wkregfsuna] 
JMP TCPDATAPROC 
LBLSYNRCVD4: AND wkreg[flags], RDONE --> RO 
EQUAL RO, 0 --> cond 
BRNEQZ LBLSYNRCVD5 
LOAD wkregfstate] <-- CLOSEWAIT 
JMP END 

LBLSYNRCVD5: LOAD wkreg[state] <- ESTABLISHED 
JMP END 

LBLESTABLISHED: JMP TCPSEQOK 

LBLESTABLISHED4: CMP wkreg[rbcount], 75RBSIZE -> cond 

BREQZ LBLESTABLISHED5 

LOAD wkregfrbcount] <- 0 
LBLESTABLISHED5: AND wkreg[flags], RDONE --> RO 

EQUAL RO, 0 --> cond 

BRNEQZ END 

LOAD wkreg[state] <- CLOSEWAIT 

JMP END 
LBLCLOSEWAIT: JMP TCPSEQOK 
LBLLASTACK: JMP TCPSEQOK 
LBLLASTACK2: AND rcvfcode], ACK --> con 

BREQZ END 
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CMP wkreg[suna], rcv[ack] — > cond 
BRNEQZ END 

CMP rcvfack], wkreg[snext] ~> cond 

BRNEQZ END 

JMP TCBDEALLOCATE 
TCPRST: LOAD snd[window] <- 0 

AND rcv[code], SYN -> cond 

BREQZ LBL02 

ADD seglen, 1 — > seglen 
LBL02: AND rcv[code], FIN -> cond 

BREQZ LBL03 

ADD seglen, 1 — > seglen 
LBL03: AND rcv[code], ACK --> cond 

BRNEQZ LBLOO 

LOAD snd[seq] <-- 0 

LOAD snd[code] <- RST|ACK 

JMP LBL01 
LBLOO: MOV rcv[ack] --> snd[seq] 

LOAD snd[code] <-- RST 
LBL01 : ADD rcv[seq], seglen — > snd[ack] 

EQUAL wkregfstate], LISTEN --> cond 

BRNEQZ IDLE 

EQUAL wkregfstate], SYNRCVD -> cond 
BREQZ TCBDEALLOCATE 
AND rcv[code], SYN --> cond 
BRNEQZ TCBDEALLOCATE 
JMP IDLE 
TCBDEALLOCATE: CAM1CLR index 
JMP IDLE 

TCPINITWIN: LOAD wkreg[code] <-- SYN 

MOV rcv[window] — > wkreg[swindow] 

MOV rcv[seq] — > wkreg[lwseq] 

MOV rcv[seq] — > wkregfrnext] 

ADD rcv[seq], RBSIZE --> wkreg[cwin] 

JMP TCPDATAPROC 
TCPSENDWIN: CMP wkreg[lwseq], rcv[seq] -> cond 

BRNEQZ LBL11 

EQUAL rcv[seq], wkreg[lwseq] --> cond 
BREQZ LBL10 

CMP wkreg[lwack], rcvfack] — > cond 

BRNEQZ LBL11 
LBL10: MOV rcv[window] — > wkreg[swindow] 

MOV rcvfseq] — > wkreg[lwseq] 

MOV rcv[ack] — > wkreg[lwack] 
LBL1 1 : EQUAL wkregfstate], ESTABLISHED -> cond 
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BRNEQZ LBLESTABLISHED4 

OR wkregfflags], SNDFIN --> wkreg[flags] 

JMP TCPACK 
TCPSEQOK: LOAD statusok <-- 0 

SUB rcv[len], HEADEPvLEN -> seglen 

AND rcv[code], SYN ~> cond 

BREQZ LBL20 

ADD seglen, 1 --> seglen 
LBL20: AND rcv[code], FIN --> cond 

BREQZ LBL21 

ADD seglen, 1 — > seglen 
LBL2 1 : SUB RBSIZE, wkreg[rbcount] --> rwindow 

EQUAL rwindow, 0 --> cond 

BREQZ LBL22 

EQUAL seglen, 0 --> cond 

BREQZ LBL22 

EQUAL wkreg[rnext], rcv[seq] --> cond 
BREQZ LBL25 
LOAD statusok <-- 1 
JMP LBL25 
LBL22: EQUAL rwindow, 0 --> cond 
BRNEQZ LBL25 

ADD wkreg[rnext], rwindow — > seqwin 

ADD rcv[seq], seglen — > seqlast 

EQUAL seglen, 0 --> cond 

BRNEQZ LBL23 

CMP seqlast, wkreg[mext] — > cond 

MOV cond — > statusok 

CMP seqlast, seqwin --> cond 

NOT cond — > cond 

AND cond, statusok --> statusok 
LBL23: CMP wkreg[mext], rcv[seq] --> cond 

BRNEQZ LBL25 

CMP seqwin, rcv[seq] --> cond 

OR statusok, cond --> statusok 
LBL25 : AND rcv[code] , SYN --> cond 

BREQZ LBL26 

SUB seglen, 1 — > seglen 
LBL26: AND rcv[code], FIN --> cond 

BREQZ LBL27 

SUB seglen, 1 --> seglen 
LBL27: EQUAL statusok, 0 --> cond 

BRNEQZ TCPACKOUT 

AND rcv[code], RST -> cond 

BRNEQZ TCBDEALLOCATE 
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AND rcv[code], SYN --> cond 
BRNEQZ TCPRST 

EQUAL wkreg[state], SYNRCVD --> cond 

BRNEQZ LBLSYNRCVD1 

JMP TCPACKIN 
TCPACKOUT: CMP seglen, 0 --> cond 

BRNEQZ LBL30 

AND rcv[code], SYN|FIN --> cond 

BREQZ IDLE 
LBL30: LOAD snd[code] <--ACK 

MOV wkreg[snext] ~> snd[seq] 

MOV wkreg[rnext] ~> snd[ack] 

SUB RBSIZE, wkreg[rbcount] -> rwindow 

CMP wkreg[state], SYNRCVD -> cond 

BREQZ LBL35 

SHL2 rwindow --> RO 

CMP RBSIZE, RO -> cond 

BRNEQZ LBL32 

CMP RMSS, rwindow --> cond 

BREQZ LBL33 
LBL32: LOAD rwindow <-- 0 
LBL33: CMP wkregfcwin], wkreg[rnext] — > cond 

BREQZ LBL34 

SUB wkregfcwin], wkreg[rnext] — > RO 

CMP rwindow, RO --> cond 

BRNEQZ LBL34 

MOV RO --> rwindow 
LBL34: ADD wkreg[rnext], rwindow --> wkreg[cwin] 
LBL3 5 : MOV rwindow --> snd[window] 

JMP END 

TCPACK: AND wkreg[flags], SNDFIN --> RO 
EQUAL RO, 0 -> cond 
BRNEQZ LBL60 

OR wkreg[code], FIN — > wkreg[code] 
LBL60: OR wkreg[code], ACK --> snd[code] 

AND wkreg[flags], -NEEDOUT -> wkreg[flags] 
MOV wkreg[snext] — > snd[seq] 
AND wkreg[code], SYN|FIN --> cond 
BREQZ LBL61 

ADD wkreg[snext], 1 — > wkreg[snext] 
LBL6 1 : MOV wkreg[rnext] --> snd[ack] 

SUB RBSIZE, wkreg[rbcount] --> rwindow 
CMP wkreg[state], SYNRCVD -> cond 
BREQZ LBL65 
SHL2 rwindow --> RO 



CMP RBSIZE, RO -> cond 

BRNEQZ LBL62 

CMP RMSS, rwindow -> cond 

BREQZ LBL63 
LBL62: LOAD rwindow <-- 0 
LBL63 : SUB wkreg[cwin] , wkreg[rnext] --> RO 

CMP rwindow, RO --> cond 

BRNEQZ LBL64 

MOV RO --> rwindow 
LBL64: ADD wkregfrnext], rwindow --> wkreg[cwin] 
LBL65: MOV rwindow — > snd[window] 

AND wkreg[code], 0 — > wkregfcode] 

EQUAL wkregfstate], LISTEN --> cond 

BRNEQZ LBLLISTEN1 

EQUAL wkreg[state], SYNRCVD -> cond 

BRNEQZ LBLSYNRCVD4 

EQUAL wkreg[state], ESTABLISHED --> cond 

BRNEQZ TCPSENDWIN 

EQUAL wkregfstate], CLOSEWAIT --> cond 

BREQZ END 

LOAD wkreg[state] <-- LASTACK 
JMP END 

TCP ACKIN: AND rcv[code] , ACK --> cond 
BREQZ LBL41 

CMP rcvfack], wkregfsuna] — > cond 
BREQZ IDLE 

CMP rcv[ack], wkregfsnext] ~> cond 
BRNEQZ TCPACKOUT 
MOV rcv[ack] --> wkreg[suna] 
AND wkregfcode], SYN -> cond 
BREQZ LBL40 

AND wkregfcode], ~SYN — > wkreg[code] 
AND wkregfflags], -FIRSTSEND --> wkreg[flags] 
LBL40: AND wkregfcode], FIN — > cond 
BREQZ LBL41 

EQUAL wkreg[snext], rcv[ack] — > cond 
BREQZ LBL41 

AND wkreg[code], -FIN --> wkregfcode] 
AND wkregfflags], -SNDFIN --> wkreg[flags] 
LBL4 1 : EQUAL wkregfstate], CLOSEWAIT --> cond 
BRNEQZ TCPSENDWIN 
EQUAL wkregfstate], ESTABLISHED --> cond 
BRNEQZ TCPDATAPROC 
EQUAL wkregfstate], LASTACK --> cond 
BRNEQZ LBLLASTACK2 
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JMP END 

TCPD ATAPROC : MOV rcvfcode] --> statusok 
MOV rcv[seq] --> seqfirst 
AND statusok, URG --> cond 
BREQZLBL51 

ADD seqfirst, rcv[urgptr] --> RO 

AND wkregfflags], RUPOK -> rwindow 

EQUAL rwindow, 0 — > cond 

BRNEQZ LBL50 

CMP RO, wkreg[rupseq] -> cond 

BREQZ LBL51 
LBL50: MOV RO --> wkreg[rupseq] 

OR wkreg[flags], RUPOK --> wkreg[flags] 
LBL5 1 : AND statusok, SYN --> cond 

BREQZ LBL52 

ADD wkreg[rnext], 1 — > wkreg[mext] 
OR wkreg[flags], NEEDOUT --> wkreg[flags] 
ADD seqfirst, 1 --> seqfirst 
LBL52: SUB RBSIZE, wkregfrbcount] --> rwindow 

ADD wkreg[rnext], rwindow — > seqwin 
ADD seqfirst, seglen — > seqlast 
CMP wkregfrnext], seqfirst — > cond 
BREQZ LBL53 

SUB wkreg[rnext], seqfirst --> RO 

SUB seglen, RO --> seglen 

MOV wkreg[rnext] --> seqfirst 
LBL53: CMP seqlast, seqwin --> cond 

BREQZ LBL54 

SUB seqlast, seqwin --> RO 

SUB seglen, RO -> seglen 

AND statusok, ~FIN — > statusok 
LBL54: EQUAL seqfirst, wkreg[rnext] — > cond 

BREQZ LBL55 

CMP seglen, 0 — > cond 

BREQZ LBL56 

ADD wkregfrnext], seglen — > wkreg[rnext] 

ADD wkreg[rbcount], seglen — > wkreg[rbcount] 
LBL512: CAM2EMPTY cond 

BRNEQZ LBL511 

CAM2LLKUP seqlast 

BREQZ LBL511 

CAM2CLR [cam2_idx] 

ADD wkregfrnext], seglen — > wkregfrnext] 

ADD wkregfrbcount], seglen — > wkregfrbcount] 
LBL5 1 1 : EQUAL wkregffinseq], wkregfrnext] --> cond 
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BRNEQZ ALLDONE 

CMP wkreg[pushseq], wkreg[rnext] — > cond 

BRNEQZ NEXT 

OR statusok, PSH --> statusok 

LOAD wkreg[pushseq] <- 0 

JMP NEXT 

ALLDONE: OR statusok, FIN -> statusok 
NEXT: OR wkreg[flags], NEEDOUT --> wkregfflags] 

LBL56: AND statusok, FIN -> cond 
BREQZ LBL58 

OR wkreg[flags], RDONE|NEEDOUT -> wkreg[flags] 
ADD wkreg[rnext], 1 — > wkreg[mext] 
LBL58: AND statusok, PSH |URG -> cond 
BREQZ NEXTP1 

OR wkreg[flags], PUSH --> wkreg[flags] 
JMPNEXTP1 
LBL55: AND statusok, FIN --> cond 
BREQZ LBL59 

ADD seqfirst, seglen — > wkreg[finseq] 
LBL59: AND statusok, PSH|URG --> cond 

BREQZ LBL5 10 

ADD seqfirst, seglen — > wkregfpushseq] 
LBL5 10: AND statusok, ~(FIN|PSH) --> statusok 

CAM2LLKUP seqlast 

BREQZ LBL515 

CAM2CLR [cam2_idx] 

ADD seqlast, seglen — > seqlast 

SUB seqlast, seqfirst --> seglen 
LBL5 15: CAM2RLKUP seqfirst 

BREQZ LBL516 

CAM2CLR [cam2_idx] 

SUB seqfirst, seglen — > seqfirst 

SUB seqlast, seqfirst --> seglen 
LBL516: CAM2WR seglen 

OR wkreg[flags], NEEDOUT --> wkreg[flags] 
NEXTP1 : AND wkreg[flags], NEEDOUT -> R0 

EQUAL R0, 0 --> cond 

BREQZ TCPACK 

EQUAL wkreg[state], LISTEN --> cond 

BRNEQZ LBLLISTEN1 

EQUAL wkreg[state], SYNRCVD --> cond 

BRNEQZ LBLSYNRCVD4 

EQUAL wkreg[state], ESTABLISHED --> cond 

BRNEQZ TCPSENDWIN 

JMP END 



